home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / program / 519 / bios.s < prev    next >
Text File  |  1991-02-24  |  2KB  |  99 lines
  1. ;************************************************************************
  2. ;* BIOS-Library, Übergabe in Registern                    *
  3. ;* ©1989 by Σ-soft, written by Markus Fritze           18.06.1988 01:59 *
  4. ;************************************************************************
  5.  
  6. getmpb:     move.l    A0,-(SP)
  7.         clr.w    -(SP)
  8.         bsr    bios
  9.         addq.l    #6,SP
  10.         rts
  11.  
  12. bconstat:    move.w    D0,-(SP)
  13.         move.w    #1,-(SP)
  14.         bsr    bios
  15.         addq.l    #4,SP
  16.         rts
  17.  
  18. bconin:     move.w    D0,-(SP)
  19.         move.w    #2,-(SP)
  20.         bsr    bios
  21.         addq.l    #4,SP
  22.         rts
  23.  
  24. bconout:    move.w    D1,-(SP)
  25.         move.w    D0,-(SP)
  26.         move.w    #3,-(SP)
  27.         bsr    bios
  28.         addq.l    #6,SP
  29.         rts
  30.  
  31. rwabs:        move.w    D0,-(SP)
  32.         move.w    D1,-(SP)
  33.         move.w    D2,-(SP)
  34.         move.l    A0,-(SP)
  35.         move.w    D3,-(SP)
  36.         move.w    #4,-(SP)
  37.         bsr    bios
  38.         lea    14(SP),SP
  39.         rts
  40.  
  41. setexc:     move.l    A0,-(SP)
  42.         move.w    D0,-(SP)
  43.         move.w    #5,-(SP)
  44.         bsr    bios
  45.         addq.l    #8,SP
  46.         rts
  47.  
  48. tickcal:    move.w    #6,-(SP)
  49.         bsr    bios
  50.         addq.l    #2,SP
  51.         rts
  52.  
  53. getbpb:     move.w    D0,-(SP)
  54.         move.w    #7,-(SP)
  55.         bsr    bios
  56.         addq.l    #4,SP
  57.         rts
  58.  
  59. bcostat:    move.w    D0,-(SP)
  60.         move.w    #8,-(SP)
  61.         bsr    bios
  62.         addq.l    #4,SP
  63.         rts
  64.  
  65. mediach:    move.w    D0,-(SP)
  66.         move.w    #9,-(SP)
  67.         bsr    bios
  68.         addq.l    #4,SP
  69.         rts
  70.  
  71. drvmap:     move.w    #$0A,-(SP)
  72.         bsr    bios
  73.         addq.l    #2,SP
  74.         rts
  75.  
  76. kbshift:    move.w    D0,-(SP)
  77.         move.w    #$0B,-(SP)
  78.         bsr    bios
  79.         addq.l    #4,SP
  80.         rts
  81.  
  82. ;************************************************************************
  83. ;* Allgemeiner Bios-Einsprung, welcher alle Register rettet (außer D0)    *
  84. ;* ACHTUNG! Sonst könnten die Register D0-D2/A0-A2 zerstört werden    *
  85. ;************************************************************************
  86. bios:        move.l    A0,D0
  87.         lea    regsave(PC),A0
  88.         movem.l D0-D7/A1-A7,(A0)
  89.         move.l    (SP)+,-(A0)    ;Rücksprungadr retten
  90.         trap    #13
  91.         movea.l D0,A0        ;Fehlermeldung retten
  92.         movem.l regsave(PC),D0-D7/A1-A7
  93.         exg    A0,D0
  94.         move.l    retsave(PC),(SP)
  95.         rts
  96.  
  97. retsave:    DS.L 1
  98. regsave:    DS.L 15
  99.